object frmMain: TfrmMain
  Left = 461
  Top = 122
  Caption = 'MLPAinter for MLPA interpretation'
  ClientHeight = 688
  ClientWidth = 946
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  DesignSize = (
    946
    688)
  PixelsPerInch = 96
  TextHeight = 13
  object pcMain: TPageControl
    Left = 0
    Top = 24
    Width = 945
    Height = 626
    ActivePage = tsAnalyses
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    ExplicitHeight = 586
    object tsSamples: TTabSheet
      Caption = 'Samples'
      ImageIndex = 1
      ExplicitHeight = 558
      object splSamplesTab: TSplitter
        Left = 0
        Top = 401
        Width = 937
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object pnlSamples: TPanel
        Left = 0
        Top = 0
        Width = 937
        Height = 401
        Align = alTop
        Caption = 'pnlSamples'
        TabOrder = 0
        DesignSize = (
          937
          401)
        object dbgSamples: TDBGrid
          Left = 8
          Top = 10
          Width = 921
          Height = 352
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsSamples
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgSamplesTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'sampleid'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'LabId'
              Width = 76
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'volgnrblok'
              Title.Caption = 'BlockNr'
              Width = 102
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'normaaltumor'
              Title.Caption = 'Normal/Test'
              Width = 74
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'percentage tumor'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'necrotisch'
              Title.Caption = 'DNA aspects'
              Width = 108
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'opmerkingen'
              Title.Caption = 'remarks'
              Width = 90
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'datum'
              Title.Caption = 'date'
              Width = 60
              Visible = True
            end>
        end
        object navSamples: TDBNavigator
          Left = 8
          Top = 368
          Width = 234
          Height = 25
          DataSource = DM.dsSamples
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
          Anchors = [akLeft, akBottom]
          TabOrder = 1
        end
      end
      object pnlSampleAssays: TPanel
        Left = 0
        Top = 404
        Width = 937
        Height = 194
        Align = alClient
        Caption = 'pnlSampleAssays'
        TabOrder = 1
        ExplicitHeight = 154
        DesignSize = (
          937
          194)
        object Label1: TLabel
          Left = 8
          Top = 8
          Width = 134
          Height = 13
          Caption = 'Assays performed on sample'
        end
        object dbgSampleAssays: TDBGrid
          Left = 8
          Top = 32
          Width = 921
          Height = 156
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsSampleAssays
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgSampleAssaysTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'GelfileName'
              Title.Caption = 'RunProtocolName'
              Width = 100
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Date'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'assayid'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'sampleid'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'kitid'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SampleIDField'
              Width = 104
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'assayprobes'
              Title.Caption = 'Probes'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'TraceFileName'
              Width = 110
              Visible = True
            end>
        end
      end
    end
    object tsRuns: TTabSheet
      Caption = 'Runs'
      ImageIndex = 2
      ExplicitHeight = 558
      object splRunsTab: TSplitter
        Left = 0
        Top = 265
        Width = 937
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object pnlRuns: TPanel
        Left = 0
        Top = 0
        Width = 937
        Height = 265
        Align = alTop
        Caption = 'pnlRuns'
        TabOrder = 0
        DesignSize = (
          937
          265)
        object dbgRuns: TDBGrid
          Left = 8
          Top = 40
          Width = 921
          Height = 185
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsRuns
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgRunsTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'runid'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'GelfileName'
              Title.Caption = 'RunProtocolName'
              Width = 168
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Technician'
              Width = 136
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Date'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'ProbeMixStockno'
              Width = 96
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'BufferStockno'
              Width = 94
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'LigaseStockNo'
              Width = 124
              Visible = True
            end>
        end
        object navRuns: TDBNavigator
          Left = 8
          Top = 231
          Width = 240
          Height = 25
          DataSource = DM.dsRuns
          Anchors = [akLeft, akBottom]
          TabOrder = 1
        end
        object btnPrintRunProtocol: TButton
          Left = 8
          Top = 8
          Width = 97
          Height = 25
          Caption = 'Print Run Protocol'
          TabOrder = 2
          OnClick = btnPrintRunProtocolClick
        end
        object btnABI310Samplefile: TButton
          Left = 240
          Top = 8
          Width = 121
          Height = 25
          Caption = 'ABI 310 Samplefile'
          TabOrder = 3
          Visible = False
        end
        object btnABI3700Samplefile: TButton
          Left = 376
          Top = 8
          Width = 113
          Height = 25
          Caption = 'ABI 3700 Samplefile'
          TabOrder = 4
          Visible = False
        end
        object btnLGTCOrderform: TButton
          Left = 504
          Top = 8
          Width = 97
          Height = 25
          Caption = 'LGTC Orderform'
          TabOrder = 5
          Visible = False
          OnClick = btnLGTCOrderformClick
        end
        object btnExportRunProtocol: TButton
          Left = 120
          Top = 8
          Width = 105
          Height = 25
          Caption = 'Export Run Protocol'
          TabOrder = 6
          OnClick = btnExportRunProtocolClick
        end
      end
      object pnlRunAssays: TPanel
        Left = 0
        Top = 268
        Width = 937
        Height = 330
        Align = alClient
        Caption = 'pnlRunAssays'
        TabOrder = 1
        ExplicitHeight = 290
        DesignSize = (
          937
          330)
        object Label2: TLabel
          Left = 16
          Top = 8
          Width = 112
          Height = 13
          Caption = 'Assays performed in run'
        end
        object dbgRunAssays: TDBGrid
          Left = 8
          Top = 40
          Width = 921
          Height = 268
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsRunAssays
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgRunAssaysTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'LabId'
              Width = 86
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'normaaltumor'
              Title.Caption = 'Normal/Test'
              Width = 98
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'kitid'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SampleIDField'
              Width = 144
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'CountOfassayprobeid'
              Title.Caption = 'Probes'
              Visible = True
            end>
        end
        object btnAddAssays: TButton
          Left = 152
          Top = 8
          Width = 75
          Height = 25
          Caption = 'Add Assays'
          TabOrder = 1
          OnClick = btnAddAssaysClick
        end
      end
    end
    object tsAnalyses: TTabSheet
      Caption = 'Analyses'
      ImageIndex = 3
      ExplicitHeight = 558
      object splAnalysesTab: TSplitter
        Left = 0
        Top = 161
        Width = 937
        Height = 3
        Cursor = crVSplit
        Align = alTop
        ExplicitTop = 185
      end
      object pnlAnalyses: TPanel
        Left = 0
        Top = 0
        Width = 937
        Height = 161
        Align = alTop
        Caption = 'pnlAnalyses'
        TabOrder = 0
        DesignSize = (
          937
          161)
        object dbgAnalyses: TDBGrid
          Left = 8
          Top = 39
          Width = 909
          Height = 113
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsAnalyses
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgAnalysesTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'kitid'
              ReadOnly = True
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'date'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Technician'
              Width = 164
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'authorized'
              ReadOnly = True
              Visible = True
            end>
        end
        object btnAddAnalysis: TButton
          Left = 8
          Top = 8
          Width = 75
          Height = 25
          Caption = 'New Analysis'
          TabOrder = 1
          OnClick = btnAddAnalysisClick
        end
        object btnEditAnalysis: TButton
          Left = 96
          Top = 8
          Width = 193
          Height = 25
          Caption = 'Edit Analysis  (Add/remove samples)'
          TabOrder = 2
          OnClick = btnEditAnalysisClick
        end
      end
      object pnlAnalysesAssays: TPanel
        Tag = 1
        Left = 0
        Top = 164
        Width = 937
        Height = 434
        Align = alClient
        TabOrder = 1
        ExplicitHeight = 394
        DesignSize = (
          937
          434)
        object Label6: TLabel
          Left = 824
          Top = 6
          Width = 56
          Height = 13
          Caption = 'Test groups'
          Visible = False
        end
        object Label8: TLabel
          Left = 696
          Top = 13
          Width = 75
          Height = 13
          Caption = 'Raw data type: '
        end
        object lblRawdataType: TLabel
          Left = 777
          Top = 13
          Width = 77
          Height = 13
          Caption = 'lblRawdataType'
        end
        object sgAnalyses: TStringGrid
          Left = 8
          Top = 88
          Width = 913
          Height = 332
          Anchors = [akLeft, akTop, akRight, akBottom]
          Color = clWhite
          ColCount = 8
          DefaultColWidth = 80
          DefaultRowHeight = 17
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing]
          ParentShowHint = False
          PopupMenu = pumAnalysisGrid
          ShowHint = True
          TabOrder = 0
          OnDrawCell = sgAnalysesDrawCell
          OnMouseMove = sgAnalysesMouseMove
          ExplicitHeight = 312
        end
        object cbShowQCProbes: TCheckBox
          Left = 224
          Top = 12
          Width = 105
          Height = 17
          AllowGrayed = True
          Caption = 'Show QC Probes'
          Checked = True
          State = cbChecked
          TabOrder = 1
          OnClick = cbShowQCProbesClick
        end
        object btnAnalysisAuthorize: TButton
          Left = 16
          Top = 16
          Width = 75
          Height = 25
          Caption = 'Authorize'
          TabOrder = 2
          OnClick = btnAuthorizeAnalysisClick
        end
        object pnlAnalisisAuthorized: TPanel
          Left = 104
          Top = 16
          Width = 97
          Height = 25
          Color = clRed
          TabOrder = 3
          Visible = False
          object Label3: TLabel
            Left = 16
            Top = 4
            Width = 63
            Height = 16
            Caption = 'Authorized'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clYellow
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
        end
        object gbTresholds: TGroupBox
          Left = 351
          Top = 6
          Width = 113
          Height = 74
          Caption = 'Tresholds'
          TabOrder = 4
          object Label4: TLabel
            Left = 8
            Top = 16
            Width = 22
            Height = 13
            Caption = 'Loss'
          end
          object Label5: TLabel
            Left = 8
            Top = 40
            Width = 22
            Height = 13
            Caption = 'Gain'
          end
          object edtAnalysisLoss: TMaskEdit
            Left = 40
            Top = 16
            Width = 33
            Height = 21
            EditMask = '!9.90;1; '
            MaxLength = 4
            TabOrder = 0
            Text = ' .  '
            OnExit = edtAnalysisLossExit
          end
          object edtAnalysisGain: TMaskEdit
            Left = 40
            Top = 40
            Width = 33
            Height = 21
            EditMask = '!9.99;1; '
            MaxLength = 4
            TabOrder = 1
            Text = ' .  '
            OnExit = edtAnalysisGainExit
          end
          object pnlAnalysisColorLoss: TPanel
            Tag = 1
            Left = 80
            Top = 16
            Width = 24
            Height = 20
            Color = clYellow
            TabOrder = 2
            OnClick = pnlAnalysisColorLossClick
          end
          object pnlAnalysisColorGain: TPanel
            Tag = 2
            Left = 80
            Top = 40
            Width = 24
            Height = 20
            Color = clAqua
            TabOrder = 3
            OnClick = pnlAnalysisColorLossClick
          end
        end
        object cbAnalysisAvgReplicates: TCheckBox
          Left = 224
          Top = 32
          Width = 121
          Height = 17
          Caption = 'Average Replicates'
          TabOrder = 5
          Visible = False
        end
        object rgAnalysisProbeSortOrder: TRadioGroup
          Left = 471
          Top = 6
          Width = 210
          Height = 74
          Caption = 'Order pobes by'
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'Default order'
            'Fragment length'
            'Chromosome'
            'Gene name'
            'Control')
          TabOrder = 6
          OnClick = rgAnalysisProbeSortOrderClick
        end
        object btnAnalysisPrintReport: TButton
          Left = 16
          Top = 48
          Width = 75
          Height = 25
          Caption = 'Print Report'
          TabOrder = 7
          OnClick = btnAnalysisPrintReportClick
        end
        object btnRetriveProbeInfo: TButton
          Left = 104
          Top = 48
          Width = 113
          Height = 25
          Caption = 'Retrieve Probe Info'
          TabOrder = 8
          OnClick = btnRetriveProbeInfoClick
        end
        object memTestGroups: TMemo
          Left = 824
          Top = 25
          Width = 105
          Height = 57
          Lines.Strings = (
            '')
          TabOrder = 9
          Visible = False
        end
      end
    end
    object tsKits: TTabSheet
      Caption = 'Kits'
      ExplicitHeight = 558
      object splKitsTab: TSplitter
        Left = 0
        Top = 259
        Width = 937
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object pnlKitsTop: TPanel
        Left = 0
        Top = 0
        Width = 937
        Height = 259
        Align = alTop
        TabOrder = 0
        DesignSize = (
          937
          259)
        object Label7: TLabel
          Left = 536
          Top = 24
          Width = 175
          Height = 13
          Caption = 'Alias for kit (from genemapper output)'
        end
        object dbgKits: TDBGrid
          Left = 8
          Top = 40
          Width = 521
          Height = 177
          Anchors = [akLeft, akTop, akBottom]
          DataSource = DM.dsKits
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgKitsTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'KitID'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Kitdescription'
              Width = 335
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Ontwerper'
              Title.Caption = 'Designer'
              Width = 98
              Visible = True
            end>
        end
        object navKits: TDBNavigator
          Left = 8
          Top = 223
          Width = 240
          Height = 25
          DataSource = DM.dsKits
          Anchors = [akLeft, akBottom]
          TabOrder = 1
        end
        object btnImportMRCkit: TButton
          Left = 8
          Top = 9
          Width = 130
          Height = 25
          Caption = 'Import MLPA kit'
          TabOrder = 2
          OnClick = btnImportMRCkitClick
        end
        object dbgKitAliases: TDBGrid
          Left = 535
          Top = 39
          Width = 394
          Height = 178
          Anchors = [akLeft, akTop, akBottom]
          DataSource = DM.dsKitalias
          TabOrder = 3
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgKitAliasesTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'kitname'
              Visible = True
            end>
        end
      end
      object pnlKitsBottom: TPanel
        Left = 0
        Top = 262
        Width = 937
        Height = 336
        Align = alClient
        Caption = 'pnlKitsBottom'
        TabOrder = 1
        ExplicitHeight = 296
        DesignSize = (
          937
          336)
        object dbgKitProbes: TDBGrid
          Left = 4
          Top = 6
          Width = 929
          Height = 290
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.dsProbes
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnTitleClick = dbgKitProbesTitleClick
          Columns = <
            item
              Expanded = False
              FieldName = 'length'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'cytoband'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'gene'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'chrpos'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'probe'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'genesub'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'order'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'control'
              Visible = True
            end>
        end
        object navKitProbes: TDBNavigator
          Left = 4
          Top = 303
          Width = 240
          Height = 25
          DataSource = DM.dsProbes
          Anchors = [akLeft, akBottom]
          TabOrder = 1
          ExplicitTop = 263
        end
      end
    end
  end
  object sbStatus: TStatusBar
    Left = 0
    Top = 669
    Width = 946
    Height = 19
    Panels = <
      item
        Width = 100
      end
      item
        Width = 50
      end>
    ExplicitTop = 629
  end
  object MainMenu: TMainMenu
    Left = 904
    object miFile: TMenuItem
      Caption = '&File'
      object miNewDatabase: TMenuItem
        Caption = '&New database'
        Enabled = False
        Visible = False
      end
      object miOpenDatabase: TMenuItem
        Caption = '&Open database'
        Visible = False
        OnClick = miOpenDatabaseClick
      end
      object miCloseDatabase: TMenuItem
        Caption = '&Close database'
      end
      object miImportGenotyper: TMenuItem
        Caption = '&Import Genotyper'
        OnClick = miImportGenotyperClick
      end
      object miImportGenemapper: TMenuItem
        Caption = 'Import &Genemapper'
        OnClick = miImportGenemapperClick
      end
      object miImportKit: TMenuItem
        Caption = 'Import &MLPA Kit'
        OnClick = btnImportMRCkitClick
      end
    end
    object miEdit: TMenuItem
      Caption = '&Edit'
      object miCut: TMenuItem
        Caption = 'Cut'
      end
      object miCopy: TMenuItem
        Caption = 'Copy'
        ShortCut = 16451
        OnClick = miCopyClick
      end
      object miPaste: TMenuItem
        Caption = 'Paste'
      end
    end
    object miTools: TMenuItem
      Caption = '&Tools'
      object miOptions: TMenuItem
        Caption = '&Options'
        OnClick = miOptionsClick
      end
      object miSelectRun: TMenuItem
        Caption = '&Select Run'
        Visible = False
        OnClick = miSelectRunClick
      end
    end
    object miShowHelp: TMenuItem
      Caption = '&Help'
      object miShowVignette: TMenuItem
        Caption = '&Vignette'
      end
      object miShowAbout: TMenuItem
        Caption = '&About'
        OnClick = miShowAboutClick
      end
    end
  end
  object dlgOpen: TOpenDialog
    DefaultExt = 'xls'
    Filter = 'Excel files|*.xls|Text files (Tab separated)|*.txt|All files|*.*'
    Left = 872
  end
  object pumAnalysisGrid: TPopupMenu
    OnPopup = pumAnalysisGridPopup
    Left = 832
    object miAnalysisControlProbe: TMenuItem
      Caption = 'Control Probe'
      OnClick = miAnalysisControlProbeClick
    end
    object miAnalysisRemoveprobe: TMenuItem
      Caption = 'Remove probe'
      OnClick = miAnalysisRemoveprobeClick
    end
    object miAnalysisReinsertprobe: TMenuItem
      Caption = 'Reinsert probe'
      OnClick = miAnalysisReinsertprobeClick
    end
    object miAnalysisPlotSample: TMenuItem
      Caption = 'Plot Sample'
      OnClick = miAnalysisPlotSampleClick
    end
    object miAnalysisRemoveassay: TMenuItem
      Caption = 'Remove assay'
      OnClick = miAnalysisRemoveassayClick
    end
    object miAnalysisTestGroups: TMenuItem
      Caption = 'Test Groups'
      Visible = False
    end
  end
  object dlgColor: TColorDialog
    Left = 800
  end
  object dlgPrint: TPrintDialog
    Left = 768
  end
  object dlgSave: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'Text files (Tab separated)|*.txt|All files|*.*'
    Title = 'Select file to export run to'
    Left = 736
  end
end
